﻿Public Class ConexionBD
    Private servidor As String = "192.168.0.100"
    Private basededatos As String = "Recmetal"
    Private usuario As String = "recselect"
    Private password As String = "r3cs3l3ct"
    Public Property ServidorP() As String
        Get
            Return servidor
        End Get
        Set(ByVal value As String)
            servidor = value
        End Set
    End Property
    Public Property BasededatosP() As String
        Get
            Return basededatos
        End Get
        Set(ByVal value As String)
            basededatos = value
        End Set
    End Property
    Public Property UsuarioP() As String
        Get
            Return usuario
        End Get
        Set(ByVal value As String)
            usuario = value
        End Set
    End Property
    Public Property PasswordP() As String
        Get
            Return password
        End Get
        Set(ByVal value As String)
            password = value
        End Set
    End Property
End Class
